home *** CD-ROM | disk | FTP | other *** search
/ PsL Monthly 1993 December / PSL Monthly Shareware CD-ROM (December 1993).iso / prgmming / win / vb / vbinst.exe / VBINST.PA_ / VBINST.PA
Encoding:
Text File  |  1992-08-27  |  429 b   |  28 lines
  1. {name for dll library}
  2. Library vbinst;
  3. Uses WinDos;
  4.  
  5. {function to be called from VB. Export is needed fo dll}
  6. Function DFree(X: Integer):Longint;Export;
  7.  
  8. Begin
  9.     {assign DiskFree function to DFree}
  10.     Dfree:=DiskFree(X);
  11.  
  12. End;
  13.  
  14. Function DSize(X: Integer):LongInt;Export;
  15.  
  16. Begin
  17.     DSize:=DiskSize(X);
  18. End;
  19.  
  20.  
  21. {needed stuff for dll}
  22. Exports
  23.     DFree index 1,
  24.     DSize index 2;
  25.  
  26. {needed null main}
  27. begin
  28. end.